//OCULTAR COLUNA DO DBGRID

void __fastcall TForm1::Button1Click(TObject *Sender)

{

DBGrid1->Columns->Items[0]->Visible = False;

}

//Irá ocultar a coluna 01